object fStany_m: TfStany_m Left = 284 Top = 160 BorderStyle = bsSingle Caption = 'Stany minimalne' ClientHeight = 412 ClientWidth = 678 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poDesktopCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object lObliczam: TLabel Left = 128 Top = 392 Width = 43 Height = 13 Caption = 'Obliczam' end object bWyjdz: TButton Left = 592 Top = 384 Width = 75 Height = 25 Caption = '&Wyjd'#378 TabOrder = 0 OnClick = bWyjdzClick end object DBGrid1: TDBGrid Left = 0 Top = 0 Width = 678 Height = 369 Align = alTop DataSource = DataSource1 Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit] TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] end object bDrukuj: TButton Left = 32 Top = 384 Width = 75 Height = 25 Caption = '&Drukuj' TabOrder = 2 OnClick = bDrukujClick end object sb: TStatusBar Left = 200 Top = 385 Width = 65 Height = 19 Align = alNone Panels = <> SimplePanel = False end object DataSource1: TDataSource DataSet = mt Left = 96 Top = 120 end object mt: TkbmMemTable Active = True DesignActivation = True AttachedAutoRefresh = True AttachMaxCount = 1 FieldDefs = < item Name = 'nazwa' DataType = ftString Size = 70 end item Name = 'symbol' DataType = ftString Size = 14 end item Name = 'ilosc' DataType = ftFloat end item Name = 'ilosc_minimalna' DataType = ftFloat end> IndexDefs = <> SortOptions = [] AllDataOptions = [mtfSaveData, mtfSaveNonVisible, mtfSaveBlobs, mtfSaveFiltered, mtfSaveIgnoreRange, mtfSaveIgnoreMasterDetail, mtfSaveDeltas] CommaTextOptions = [mtfSaveData] CSVQuote = '"' CSVFieldDelimiter = ',' CSVRecordDelimiter = ',' CSVTrueString = 'True' CSVFalseString = 'False' PersistentSaveOptions = [mtfSaveData, mtfSaveNonVisible, mtfSaveIgnoreRange, mtfSaveIgnoreMasterDetail] PersistentBackup = False ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy] FilterOptions = [] Version = '2.53b' LanguageID = 0 SortID = 0 SubLanguageID = 1 LocaleID = 1024 Left = 128 Top = 120 object mtnazwa: TStringField FieldName = 'nazwa' Size = 70 end object mtsymbol: TStringField FieldName = 'symbol' Size = 14 end object mtilosc: TFloatField FieldName = 'ilosc' end object mtilosc_minimalna: TFloatField FieldName = 'ilosc_minimalna' end end object frReport: TfrReport InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit] OnGetValue = frReportGetValue Left = 504 Top = 376 ReportForm = {18000000} end object frDBDataSet1: TfrDBDataSet DataSet = mt Left = 536 Top = 376 end end